Use bound-and-true-p for byte compile warning
authorSyohei YOSHIDA <syohex@gmail.com>
Wed, 18 Nov 2015 03:55:56 +0000 (12:55 +0900)
committerSyohei YOSHIDA <syohex@gmail.com>
Wed, 18 Nov 2015 03:55:56 +0000 (12:55 +0900)
which-key.el

index 919fe5478d8b50773785158d3f373ddda7b3da86..7c57ccfdea129032e4f9df9defbf05cf6f94f1ae 100644 (file)
@@ -1426,8 +1426,7 @@ area."
                    (and (< 1 n-pages) paging-key-bound)
                    use-descbind)
                (not (and which-key-allow-evil-operators
-                         (boundp 'evil-this-operator)
-                         evil-this-operator)))
+                         (bound-and-true-p evil-this-operator))))
       (propertize (format "[%s %s]" key
                           (if use-descbind "help" next-page-n))
                   'face 'which-key-note-face))))
@@ -1630,7 +1629,7 @@ Finally, show the buffer."
                (not which-key-inhibit)
                ;; Do not display the popup if a command is currently being
                ;; executed
-               (or (and which-key-allow-evil-operators evil-this-operator)
+               (or (and which-key-allow-evil-operators (bound-and-true-p evil-this-operator))
                    (null this-command)))
       (which-key--create-buffer-and-show prefix-keys))))